﻿Public Class SerialObj

#Region "Declaracion"
    Private _Encriptado As String
    Private _Serial As String
    Private _FechaIngreso As String
    Public Shared _Seed As String
    Private _Trial As Boolean
    Private Shared _diasDePrueba As Integer
#End Region

#Region "Propiedades"
    Public Property Encriptado() As String
        Get
            Return _Encriptado
        End Get
        Set(ByVal value As String)
            _Encriptado = value
        End Set
    End Property

    Public Property Serial() As String
        Get
            Return _Serial
        End Get
        Set(ByVal value As String)
            _Serial = value
        End Set
    End Property

    Public Property FechaIngreso() As String
        Get
            Return _FechaIngreso
        End Get
        Set(ByVal value As String)
            _FechaIngreso = value
        End Set
    End Property

    Public Shared Property Seed() As String
        Get
            Return _Seed
        End Get
        Set(ByVal value As String)
            _Seed = value
        End Set
    End Property

    Public Property Trial() As Boolean
        Get
            Return _Trial
        End Get
        Set(ByVal Value As Boolean)
            _Trial = Value
        End Set
    End Property

    Public Shared Property DiasDePrueba() As Integer
        Get
            Return _diasDePrueba
        End Get
        Set(ByVal Value As Integer)
            _diasDePrueba = Value
        End Set
    End Property

#End Region

#Region "Constructores"

    Public Sub New(ByVal Encriptado As String, ByVal Serial As String)
        Me.Encriptado = Encriptado
        Me.Serial = Serial
        FechaIngreso = Now.ToShortDateString
    End Sub

    Public Sub New()
        FechaIngreso = Now.ToShortDateString
    End Sub

#End Region
End Class
